home *** CD-ROM | disk | FTP | other *** search
- 10 OPEN "T5-29.PLT" FOR OUTPUT AS #1
- 20 DIM A$(40),B$(40),C$(40)
- 30 A$="THIS LABEL IS RIGHT JUSTIFIED"
- 40 PRINT #1,"IN;SP1;SM*;PA6000,5500;"
- 50 PRINT #1,"CP";-LEN(A$);"0;LB";A$+CHR$(3)
- 60 B$="THIS LABEL IS CENTERED BELOW THE POINT"
- 70 PRINT #1,"PA4500,5000;"
- 80 PRINT #1,"CP";-LEN(B$)/2;"-.5;LB";B$+CHR$(3)
- 90 C$="VERTICALY CENTERED LABEL"
- 100 PRINT #1,"PA2750,4500;"
- 110 PRINT #1,"CP0,-.25;LB";C$+CHR$(3)
- 120 END